home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 27.zip / BS1 part 27 / ImageMaster_d1.adf / print-docs < prev    next >
Text File  |  1992-10-05  |  3KB  |  91 lines
  1. ; CBM installer script to install Imagemaster on users hard-drive
  2. ;     Written: August 28th, 1992
  3. ; Last update: October 5th, 1992
  4. ;          by: Ben Williams
  5. ;----------------------------------------------------------------
  6.  
  7.  
  8. ; This bypasses the final dir text
  9. ;---------------------------------
  10. (set @default-dest "")
  11.  
  12. ; This bypassess the entry text
  13. ; In a tricky manner... "welcome"
  14. ; intentionally NEVER gets executed
  15. ;----------------------------------
  16. (set foo 1)
  17. (if (= foo 0)
  18.     (welcome)
  19. )
  20.  
  21. ; We'll need our compressed-file extraction command:
  22. ;---------------------------------------------------
  23. (set src_disk "IM_Install2")
  24. (askdisk
  25.     (prompt ("Please insert the %s diskette" src_disk))
  26.     (help "We need to copy some files from this diskette.")
  27.     (dest src_disk)
  28. )
  29.  
  30. ; Get the extractor
  31. ;------------------
  32. (copyfiles (source (cat src_disk ":"))
  33.            (dest "ram:")
  34.            (pattern "extract")
  35.            (files)
  36. )
  37.  
  38. ; We'll need our compressed-file extraction command:
  39. ;---------------------------------------------------
  40. (set src_disk "IM_Install4")
  41. (askdisk
  42.     (prompt ("Please insert the %s diskette" src_disk))
  43.     (help "We need to copy some files from this diskette.")
  44.     (dest src_disk)
  45. )
  46.  
  47. ; Get the archive from disk four
  48. ;--------------------------------
  49. (copyfiles (source (cat src_disk ":"))
  50.            (dest "ram:")
  51.            (pattern "ia.lzh")
  52.            (files)
  53. )
  54.  
  55. ; Create the actual doc file
  56. ;---------------------------
  57. (makedir "ram:gbzyx")
  58. (run "ram:extract >con:0/50/640/100/extract -m e ram:ia ram:gbzyx/")
  59.  
  60. ; Warn user this will take a while
  61. ;---------------------------------
  62. (message "You have started the process that prints the manual "
  63.          "addendum to your printer. This will take considerable "
  64.          "time, as this addendum is over 100 pages long. If you "
  65.          "do not wish to print the addendum, abort this operation "
  66.          "right now. Note that this addendum will be replaced by "
  67.          "an up to date manual within a few months - this is only "
  68.          "an interim measure."
  69. )
  70.  
  71. ; Print it!
  72. ;----------
  73. (run "type ram:gbzyx/i_addendum to prt:")
  74.  
  75. ; Clean Up
  76. ;---------
  77. (delete "ram:ia.lzh")
  78. (run "delete ram:gbzyx ALL QUIET")
  79.  
  80. ; No exit by the book because we don't want the "installed" message
  81. ;------------------------------------------------------------------
  82. (message "The addendum to the Imagemaster manual has been sent to "
  83.          "your printer. This addendum has a table of contents and "
  84.          "an index; be certain to use these as they will help you "
  85.          "a great deal.  Note that this addendum will be replaced "
  86.          "by a more detailed manual in the future; for now, we're "
  87.          "providing this to cover you while we write the next one."
  88. )
  89.  
  90. (exit (quiet))
  91.